/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc A) / Acorn User China CD-ROM (UK) (Disc A).bin / DEMON / ACORN-STARTER / START.ARC / !DemConfig_CheckIp

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 22 f4 20 43 68 | 65 63 6b 20 69 66 20 49 |...". Ch|eck if I|
|00000010| 50 20 61 64 64 72 65 73 | 73 20 69 73 20 76 61 6c |P addres|s is val|
|00000020| 69 64 0d 00 14 0e de 20 | 62 75 66 25 20 32 35 36 |id..... |buf% 256|
|00000030| 0d 00 1e 1f ff 20 22 53 | 65 74 20 44 65 6d 43 6f |..... "S|et DemCo|
|00000040| 6e 66 69 67 24 49 70 56 | 61 6c 69 64 20 30 22 0d |nfig$IpV|alid 0".|
|00000050| 00 28 3f c8 99 20 22 4f | 53 5f 52 65 61 64 56 61 |.(?.. "O|S_ReadVa|
|00000060| 72 56 61 6c 22 2c 22 44 | 65 6d 43 6f 6e 66 69 67 |rVal","D|emConfig|
|00000070| 24 49 70 41 64 64 72 22 | 2c 62 75 66 25 2c 32 35 |$IpAddr"|,buf%,25|
|00000080| 36 2c 30 2c 30 20 b8 20 | 2c 2c 6c 65 6e 25 0d 00 |6,0,0 . |,,len%..|
|00000090| 32 1f 62 75 66 25 3f 6c | 65 6e 25 3d 31 33 3a 20 |2.buf%?l|en%=13: |
|000000a0| 69 70 24 3d 24 62 75 66 | 25 2b 22 2e 22 0d 00 3c |ip$=$buf|%+"."..<|
|000000b0| 0e e3 20 69 25 3d 31 20 | b8 20 34 0d 00 46 20 20 |.. i%=1 |. 4..F  |
|000000c0| 20 64 6f 74 25 3d a7 69 | 70 24 2c 22 2e 22 29 3a | dot%=.i|p$,"."):|
|000000d0| 20 e7 20 64 6f 74 25 3d | 30 20 e0 0d 00 50 25 20 | . dot%=|0 ...P% |
|000000e0| 20 6e 75 6d 24 3d c0 69 | 70 24 2c 64 6f 74 25 2d | num$=.i|p$,dot%-|
|000000f0| 31 29 3a 20 6e 75 6d 25 | 3d bb 28 6e 75 6d 24 29 |1): num%|=.(num$)|
|00000100| 0d 00 5a 2b 20 20 e7 20 | 6e 75 6d 25 3c 30 20 84 |..Z+  . |num%<0 .|
|00000110| 20 6e 75 6d 25 3e 32 35 | 35 20 84 20 c3 28 6e 75 | num%>25|5 . .(nu|
|00000120| 6d 25 29 3c 3e 6e 75 6d | 24 20 e0 0d 00 64 16 20 |m%)<>num|$ ...d. |
|00000130| 20 69 70 24 3d c1 69 70 | 24 2c 64 6f 74 25 2b 31 | ip$=.ip|$,dot%+1|
|00000140| 29 0d 00 6e 05 ed 0d 00 | 78 0f e7 20 69 70 24 3c |)..n....|x.. ip$<|
|00000150| 3e 22 22 20 e0 0d 00 82 | 1f ff 20 22 53 65 74 20 |>"" ....|.. "Set |
|00000160| 44 65 6d 43 6f 6e 66 69 | 67 24 49 70 56 61 6c 69 |DemConfi|g$IpVali|
|00000170| 64 20 31 22 0d ff       |                         |d 1"..  |        |
+--------+-------------------------+-------------------------+--------+--------+